// TOWN SPECIAL ENCOUNTERS
//    Town 75: Inner Lair of Drakos

beginzonescript;

variables;

short im_hostile = 0;
short max_crime = 200;
short last_abil;
short counter = 0;
short set_ter = 0;
short set_ter2 = 0;
short set_ter3 = 0;
short set_ter4 = 0;

body;

beginstate INIT_STATE;
	last_abil = get_current_tick();

//	set_name(,);
//	add_range_to_group(,,groupn);

	set_aggression(7515,50);
	set_aggression(7536,50);
	set_aggression(7537,50);

	set_aggression(30002,60);
	change_max_health(30002,100);
	set_attack_bonus(30002,50);
	
	set_crime_tolerance(max_crime);

	break;

beginstate EXIT_STATE;
break;

beginstate START_STATE;
	if ((set_ter == 0) && (gf(75,11) > 0)) {
		set_ter = 1;
		//set_floor_layer(0,9,14,4,0);
		//set_floor_layer(0,10,14,4,0);
		//set_floor_layer(0,11,14,4,0);
		//set_floor_layer(0,12,14,4,0);
		//set_floor_layer(0,9,15,4,0);
		//set_floor_layer(0,10,15,4,0);
		//set_floor_layer(0,11,15,4,0);
		//set_floor_layer(0,12,15,4,0);
		//set_floor_layer(0,9,16,4,0);
		//set_floor_layer(0,10,16,4,0);
		//set_floor_layer(0,11,16,4,0);
		//set_floor_layer(0,12,16,4,0);
		
		//set_floor_layer(0,40,13,4,0);
		//set_floor_layer(0,40,14,4,0);
		//set_floor_layer(0,40,15,4,0);
		//set_floor_layer(0,40,16,4,0);

		}
		
	if ((char_ok(7530)) && (set_ter2 == 0)) {
		set_ter2 = 1;
		set_name(7530,"Soulstealer");
		set_level(7530,28);
		set_boss_level(7530,1);
		set_coloradj(7530,64);
		add_ability(7530, 10, 65, 0);
		set_name(7531,"Soulstealer");
		set_level(7531,28);
		set_boss_level(7531,1);
		set_coloradj(7531,64);
		add_ability(7531, 10, 65, 0);
		}

	// extra kludge code for safety since was a weird bug here
	if ((set_ter3 == 0) && (gf(75,11) > 0)) {
		set_ter3 = 1;
		//set_floor_layer(0,9,14,4,0);
		//set_floor_layer(0,10,14,4,0);
		//set_floor_layer(0,11,14,4,0);
		//set_floor_layer(0,12,14,4,0);
		//set_floor_layer(0,9,15,4,0);
		//set_floor_layer(0,10,15,4,0);
		//set_floor_layer(0,11,15,4,0);
		//set_floor_layer(0,12,15,4,0);
		//set_floor_layer(0,9,16,4,0);
		//set_floor_layer(0,10,16,4,0);
		//set_floor_layer(0,11,16,4,0);
		//set_floor_layer(0,12,16,4,0);
		
		//set_floor_layer(0,40,13,4,0);
		//set_floor_layer(0,40,14,4,0);
		//set_floor_layer(0,40,15,4,0);
		//set_floor_layer(0,40,16,4,0);

		}
		
	if ((set_ter4 == 0) && (gf(75,11) > 0)) {
		set_ter4 = 1;
		
		set_terrain(0,10,14,250);
		set_terrain(0,10,15,250);
		set_terrain(0,10,16,250);

		set_terrain(0,40,13,250);
		set_terrain(0,40,14,250);
		set_terrain(0,40,15,250);
		set_terrain(0,40,16,250);

		}
break;

beginstate 10;
break;

beginstate 11;
break;

beginstate 12;
break;

beginstate 13;
break;

beginstate 14;
break;

//	print_str("");
//	set_terrain_string_range("",1);
//	set_terrain_string_range("The sign says - .",1);

